Mobiclic 71/MOBICLIC 71.ISO/mac/DATA/COMMUN/temp0001/00038_Script_38

Text File | 2004-12-05 | 399b | 29 lines

-- initialisation piste aide

global pisteAideRub, aideRub

on beginSprite
  set s = the currentSpriteNum
  masquerPistes s,s+1
  set pisteAideRub = s
  set aideRub=0
end

on mouseUp
  if aideRub=1 then
    do "aideRub"
    cursor -1
  end if
end

on mouseEnter
  if aideRub=1 then
    cursor 280
  end if
end

on mouseLeave
  if aideRub=1 then
    cursor -1
  end if
end